home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 14 / CU Amiga Magazine's Super CD-ROM 14 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-09].iso / CUCD / Programming / XPK / Developer / Include / Modula2 / interfaces / XpkSubL.def < prev   
Encoding:
Modula Definition  |  1997-02-15  |  1.2 KB  |  35 lines
  1. (*************************************************************************
  2.  
  3. :Program.    XpkSubL.def
  4. :Contents.   Lib-Call-Interface-Module for XpkSub-libraries
  5. :Author.     Oliver Knorr
  6. :Remark.     Derived from Hartmut Goebel's Oberon Interface
  7. :Remark.     This is yet untested!
  8. :Copyright.  Copyright © 1992 by Oliver Knorr
  9. :Copyright.  May be freely distributed with the Xpk-Package
  10. :Copyright.  permission is given to be included with M2Amiga
  11. :Language.   Modula-2
  12. :Translator. M2Amiga V4.0
  13. :History.    V1.0, 29 Jul 1992 Oliver Knorr
  14. :Date.       29 Jul 1992 01:28:40
  15.  
  16. *************************************************************************)
  17.  
  18. DEFINITION MODULE XpkSubL;
  19.  
  20. IMPORT d:XpkSubD, R, ExecD;
  21.  
  22. VAR
  23.   xpkSubVersion : INTEGER;
  24.   subBase : ExecD.LibraryPtr;
  25.  
  26. PROCEDURE XpksPackerInfo  (): d.XpkInfoPtr; CODE -30;
  27. PROCEDURE XpksPackChunk   (params{R.A0}: d.XpkSubParamsPtr): LONGINT; CODE -36;
  28. PROCEDURE XpksPackFree    (params{R.A0}: d.XpkSubParamsPtr); CODE -42;
  29. PROCEDURE XpksPackReset   (params{R.A0}: d.XpkSubParamsPtr): LONGINT; CODE -48;
  30. PROCEDURE XpksUnpackChunk (params{R.A0}: d.XpkSubParamsPtr): LONGINT; CODE -54;
  31. PROCEDURE XpksUnpackFree  (params{R.A0}: d.XpkSubParamsPtr); CODE -60;
  32.  
  33. END XpkSubL.
  34.  
  35.